home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 012 / quickies.arc / ASK.SCR < prev    next >
Text File  |  1987-03-31  |  512b  |  56 lines
  1. N ASK.COM
  2. A 100
  3. XOR BH,BH
  4. MOV BL,[0080]
  5. MOV DI,BX
  6. ADD DI,0081
  7. MOV AL,20
  8. STOSB
  9. STOSB
  10. MOV AL,24
  11. STOSB
  12. MOV DX,0082
  13. MOV AH,09
  14. INT 21
  15. MOV AH,08
  16. INT 21
  17. AND AL,DF
  18. PUSH AX
  19. CMP AL,59
  20. JZ 013D
  21. CMP AL,4E
  22. JZ 0131
  23. MOV DL,AL
  24. MOV AH,02
  25. INT 21
  26. JMP 014B
  27. MOV DL,AL
  28. MOV AH,02
  29. INT 21
  30. MOV DL,6F
  31. INT 21
  32. JMP 014B
  33. MOV DL,AL
  34. MOV AH,02
  35. INT 21
  36. MOV DL,65
  37. INT 21
  38. MOV DL,73
  39. INT 21
  40. MOV DL,0D
  41. INT 21
  42. MOV DL,0A
  43. INT 21
  44. MOV DX,0000
  45. POP AX
  46. MOV AH,31
  47. INT 21
  48.  
  49. RCX
  50. 5B
  51. W
  52. Q
  53. ,65
  54. INT 21
  55. MOV DL,73
  56. INT